home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi Programmer's Power Pack
/
Delphi Volume 1.iso
/
e_to_l
/
enhlb100
/
enhledit.dfm
/
enhledit.txt
Wrap
Text File
|
1996-09-15
|
6KB
|
212 lines
object MCEnhancedListBoxEditorDialog: TMCEnhancedListBoxEditorDialog
Left = 198
Top = 98
ActiveControl = OKBtn
BorderStyle = bsDialog
Caption = 'Choose labels'
ClientHeight = 255
ClientWidth = 365
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
PixelsPerInch = 96
Position = poScreenCenter
TextHeight = 16
object SrcLabel: TLabel
Left = 8
Top = 8
Width = 94
Height = 13
Caption = 'Available labels:'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
IsControl = True
end
object DstLabel: TLabel
Left = 192
Top = 8
Width = 139
Height = 13
Caption = 'Ordered selected labels:'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
IsControl = True
end
object IncludeBtn: TSpeedButton
Left = 160
Top = 32
Width = 24
Height = 24
Hint = 'Add'
Caption = '>'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
OnClick = IncludeBtnClick
IsControl = True
end
object IncAllBtn: TSpeedButton
Left = 160
Top = 64
Width = 24
Height = 24
Hint = 'Add all'
Caption = '>>'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
OnClick = IncAllBtnClick
IsControl = True
end
object ExcludeBtn: TSpeedButton
Left = 160
Top = 96
Width = 24
Height = 24
Hint = 'Remove'
Caption = '<'
Enabled = False
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
OnClick = ExcludeBtnClick
IsControl = True
end
object ExAllBtn: TSpeedButton
Left = 160
Top = 128
Width = 24
Height = 24
Hint = 'Remove all'
Caption = '<<'
Enabled = False
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
OnClick = ExcAllBtnClick
IsControl = True
end
object SpeedButton1: TSpeedButton
Left = 336
Top = 24
Width = 25
Height = 25
Hint = 'Move item up'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
3333333333777F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
3333333777737777F333333099999990333333373F3333373333333309999903
333333337F33337F33333333099999033333333373F333733333333330999033
3333333337F337F3333333333099903333333333373F37333333333333090333
33333333337F7F33333333333309033333333333337373333333333333303333
333333333337F3333333333333303333333333333337333333330000}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 336
Top = 48
Width = 25
Height = 25
Hint = 'Move item down'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337F33333333333333033333333333333373F333333333333090333
33333333337F7F33333333333309033333333333337373F33333333330999033
3333333337F337F33333333330999033333333333733373F3333333309999903
333333337F33337F33333333099999033333333373333373F333333099999990
33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F333333333333000333333333333377733333330000}
NumGlyphs = 2
OnClick = SpeedButton2Click
end
object OKBtn: TBitBtn
Left = 83
Top = 220
Width = 77
Height = 27
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
Kind = bkOK
Margin = 2
Spacing = -1
IsControl = True
end
object CancelBtn: TBitBtn
Left = 183
Top = 220
Width = 77
Height = 27
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Kind = bkCancel
Margin = 2
Spacing = -1
IsControl = True
end
object SrcList: TListBox
Left = 8
Top = 24
Width = 144
Height = 185
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 13
MultiSelect = True
ParentFont = False
Sorted = True
TabOrder = 2
IsControl = True
end
object DstList: TListBox
Left = 192
Top = 24
Width = 144
Height = 185
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 13
MultiSelect = True
ParentFont = False
TabOrder = 3
IsControl = True
end
end